package com.ccut.wp.framework.server.http.core;

import org.slf4j.Logger;
import org.slf4j.LoggerFactory;

import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.lang.annotation.Annotation;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.Enumeration;
import java.util.LinkedHashSet;
import java.util.List;
import java.util.Set;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

/**
 * Created by lixiaoqing on 2018/3/22.
 */
public class PackageScanner {
    private static final Logger LOG = LoggerFactory.getLogger(PackageScanner.class);

    /**
     * 从包package中获取所有的标记annotation的Class
     * @param annotationClass
     * @param packageList
     * @return
     */
    public static Set<Class<?>> getClasses(Class<? extends Annotation> annotationClass, List<String> packageList) {
        Set<Class<?>> classes = new LinkedHashSet<>();

        // 第一个class类的集合
        if (packageList == null) {
            return classes;
        }
        // 是否循环迭代
        boolean recursive = true;

        for (String packageName : packageList) {
            String packageDirName = packageName.replace('.', '/');
            // 定义一个枚举的集合 并进行循环来处理这个目录下的things
            Enumeration<URL> dirs;
            try {
                dirs = Thread.currentThread().getContextClassLoader()
                        .getResources(packageDirName);
                while (dirs.hasMoreElements()) {
                    // 获取下一个元素
                    URL url = dirs.nextElement();
                    String protocol = url.getProtocol();
                    // 如果是以文件的形式保存在服务器上
                    if ("file".equals(protocol)) {
                        LOG.info("file path:"+url.getPath());
                        // 获取包的物理路径
                        String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
                        // 以文件的方式扫描整个包下的文件 并添加到集合中
                        findAndAddClassesInPackageByFile(packageName, filePath,
                                recursive, classes, annotationClass);
                    }else if("jar".equals(protocol)) {
                        // 如果是jar包文件
                        // 定义一个JarFile
                        LOG.info("jar path:"+url.getPath());
                        JarFile jar;
                        try {
                            // 获取jar
                            jar = ((JarURLConnection) url.openConnection())
                                    .getJarFile();
                            // 从此jar包 得到一个枚举类
                            Enumeration<JarEntry> entries = jar.entries();
                            while (entries.hasMoreElements()) {
                                // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
                                JarEntry jarEntry = entries.nextElement();
                                String name = jarEntry.getName();
                                // 如果是以/开头的
                                if (name.charAt(0) == '/') {
                                    // 获取后面的字符串
                                    name = name.substring(1);
                                }
                                // 如果前半部分和定义的包名相同
                                if (name.startsWith(packageDirName)) {
                                    int index = name.lastIndexOf('/');
                                    // 如果以"/"结尾 是一个包
                                    if (index != -1) {
                                        // 获取包名 把"/"替换成"."
                                        packageName = name.substring(0, index).replace('/', '.');
                                    }
                                    // 如果可以迭代下去 并且是一个包
                                    if (index != -1 || recursive) {
                                        // 如果是一个.class文件 而且不是目录
                                        if (name.endsWith(".class") && !jarEntry.isDirectory()) {
                                            String className = name.substring(packageName.length()+1, name.length() - 6);
                                            try {
                                                // 添加到classes
                                                Class<? extends Object> cls = Thread.currentThread()
                                                        .getContextClassLoader()
                                                        .loadClass(packageName + "." + className);

                                                if (isAnnotationOnBean(cls, annotationClass)) {
                                                    classes.add(cls);
                                                }

                                            } catch (ClassNotFoundException e) {
                                                // log.error("添加用户自定义视图类错误 找不到此类的.class文件");
                                                LOG.error(e.getMessage(),e);
                                            }
                                        }

                                    }
                                }
                            }
                        }catch (Exception e) {
                            // log.error("在扫描用户定义视图时从jar包获取文件出错");
                            LOG.error(e.getMessage(),e);
                        }
                    }
                }
            } catch (IOException e) {
                LOG.error(e.getMessage(),e);
            }
        }
        return classes;
    }


    /**
     * 以文件的形式来获取包下的所有Class
     *
     * @param packageName
     * @param packagePath
     * @param recursive
     * @param classes
     */
    public static void findAndAddClassesInPackageByFile(String packageName,
                                                        String packagePath, final boolean recursive, Set<Class<?>> classes,
                                                        final Class<? extends Annotation> annotationClass) {
        // 获取此包的目录 建立一个File
        File dir = new File(packagePath);
        // 如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            // log.warn("用户定义包名 " + packageName + " 下没有任何文件");
            return;
        }
        // 如果存在 就获取包下的所有文件 包括目录
        File[] dirfiles = dir.listFiles(new FileFilter() {
            // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
            public boolean accept(File file) {
                return (recursive && file.isDirectory())
                        || (file.getName().endsWith(".class"));
            }
        });
        // 循环所有文件
        for (File file : dirfiles) {
            // 如果是目录 则继续扫描

            if (file.isDirectory()) {
                findAndAddClassesInPackageByFile(
                        packageName + "." + file.getName(),
                        file.getAbsolutePath(), recursive, classes,
                        annotationClass);
            } else {
                // 如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0,
                        file.getName().length() - 6);
                try {
                    // 添加到集合中去
                    // classes.add(Class.forName(packageName + '.' +
                    // className));
                    // 经过回复同学的提醒，这里用forName有一些不好，会触发static方法，没有使用classLoader的load干净
                    //System.out.println(packageName + '.' + className);

                    Class<? extends Object> cls = Thread.currentThread().getContextClassLoader()
                            .loadClass(packageName + '.' + className);

                    if (isAnnotationOnBean(cls,annotationClass)) {
                        classes.add(cls);
                    }

                } catch (ClassNotFoundException e) {
                    // log.error("添加用户自定义视图类错误 找不到此类的.class文件");
                    LOG.error(e.getMessage(),e);
                }
            }
        }
    }

    public static boolean isAnnotationOnBean(Class<? extends Object> cls,
                                             Class<? extends Annotation> annotationClass) {
        boolean ret = false;
        if (cls.isAnnotation() || cls.isInterface()) {
            return ret;
        }

        if (cls.isAnnotationPresent(annotationClass)) {
            ret = true;

        }
        return ret;
    }

}
